home *** CD-ROM | disk | FTP | other *** search
/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc A) / Acorn User China CD-ROM (UK) (Disc A).bin / HENSA / HYPERTEXT / WEBSTER.ARC / !Webster_Fetchers_FTP < prev    next >
Unknown  |  1995-04-02  |  6.1 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1e f4 20 46 54 | 50 20 46 65 74 63 68 65 |..... FT|P Fetche|
|00000010| 72 20 66 6f 72 20 54 43 | 50 49 50 20 76 34 0d 00 |r for TC|PIP v4..|
|00000020| 14 12 f4 20 50 61 75 6c | 20 6c 20 41 6c 6c 65 6e |... Paul| l Allen|
|00000030| 0d 00 1e 15 f4 20 41 6e | 64 72 65 77 20 4a 20 50 |..... An|drew J P|
|00000040| 75 6c 6c 61 6e 0d 00 28 | 04 0d 00 32 16 c8 99 22 |ullan..(|...2..."|
|00000050| 4f 53 5f 47 65 74 45 6e | 76 22 20 b8 20 63 24 0d |OS_GetEn|v" . c$.|
|00000060| 00 3c 0c 63 63 24 20 3d | 20 63 24 0d 00 46 04 0d |.<.cc$ =| c$..F..|
|00000070| 00 50 29 50 25 3d a7 63 | 24 2c 22 22 22 22 2c a7 |.P)P%=.c|$,"""",.|
|00000080| 63 24 2c 22 22 22 22 29 | 2b 31 29 3a 63 24 3d c1 |c$,"""")|+1):c$=.|
|00000090| 63 24 2c 50 25 2b 31 29 | 0d 00 5a 1c c8 95 c0 63 |c$,P%+1)|..Z....c|
|000000a0| 24 2c 31 29 3d 22 20 22 | 3a 63 24 3d c1 63 24 2c |$,1)=" "|:c$=.c$,|
|000000b0| 32 29 3a ce 0d 00 64 2b | 50 25 3d a7 63 24 2c 22 |2):...d+|P%=.c$,"|
|000000c0| 20 22 29 3a 4d 61 63 24 | 3d c0 63 24 2c 50 25 2d | "):Mac$|=.c$,P%-|
|000000d0| 31 29 3a 63 24 3d c1 63 | 24 2c 50 25 2b 31 29 0d |1):c$=.c|$,P%+1).|
|000000e0| 00 6e 18 c8 95 97 63 24 | 3d 33 32 3a 63 24 3d c1 |.n....c$|=32:c$=.|
|000000f0| 63 24 2c 32 29 3a ce 0d | 00 78 2b 50 25 3d a7 63 |c$,2):..|.x+P%=.c|
|00000100| 24 2c 22 20 22 29 3a 53 | 72 63 24 3d c0 63 24 2c |$," "):S|rc$=.c$,|
|00000110| 50 25 2d 31 29 3a 63 24 | 3d c1 63 24 2c 50 25 2b |P%-1):c$|=.c$,P%+|
|00000120| 31 29 0d 00 82 18 c8 95 | 97 63 24 3d 33 32 3a 63 |1)......|.c$=32:c|
|00000130| 24 3d c1 63 24 2c 32 29 | 3a ce 0d 00 8c 0c 44 65 |$=.c$,2)|:.....De|
|00000140| 73 74 24 3d 63 24 0d 00 | 96 2f 54 65 6d 70 44 65 |st$=c$..|./TempDe|
|00000150| 73 74 24 3d 22 3c 57 69 | 6d 70 24 53 63 72 61 70 |st$="<Wi|mp$Scrap|
|00000160| 44 69 72 3e 2e 57 65 62 | 73 74 65 72 2e 46 54 50 |Dir>.Web|ster.FTP|
|00000170| 54 65 6d 70 22 0d 00 a0 | 0c de 20 46 24 28 32 30 |Temp"...|.. F$(20|
|00000180| 29 0d 00 aa 04 0d 00 b4 | 17 74 61 73 6b 24 3d 22 |).......|.task$="|
|00000190| 46 54 50 20 46 65 74 63 | 68 65 72 22 0d 00 be 15 |FTP Fetc|her"....|
|000001a0| de 20 62 6c 25 20 32 35 | 36 2c 6d 65 25 20 32 35 |. bl% 25|6,me% 25|
|000001b0| 36 0d 00 c8 3b 24 62 6c | 25 3d 22 54 41 53 4b 22 |6...;$bl|%="TASK"|
|000001c0| 3a c8 99 22 57 69 6d 70 | 5f 49 6e 69 74 69 61 6c |:.."Wimp|_Initial|
|000001d0| 69 73 65 22 2c 32 30 30 | 2c 21 62 6c 25 2c 74 61 |ise",200|,!bl%,ta|
|000001e0| 73 6b 24 20 b8 20 2c 74 | 61 73 6b 25 0d 00 d2 0e |sk$ . ,t|ask%....|
|000001f0| 63 68 25 3d 30 3a 4f 25 | 3d 30 0d 00 dc 15 ee 85 |ch%=0:O%|=0......|
|00000200| 20 f2 65 72 72 6f 72 28 | f6 24 2c 9e 29 3a e0 0d | .error(|.$,.):..|
|00000210| 00 e6 0b 71 75 69 74 25 | 3d a3 0d 00 f0 0d f2 64 |...quit%|=......d|
|00000220| 6f 73 63 72 69 70 74 0d | 00 fa 0a f2 64 6f 66 74 |oscript.|....doft|
|00000230| 70 0d 01 04 04 0d 01 0e | 05 f5 0d 01 18 27 20 c8 |p.......|.....' .|
|00000240| 99 22 4f 53 5f 52 65 61 | 64 4d 6f 6e 6f 74 6f 6e |."OS_Rea|dMonoton|
|00000250| 69 63 54 69 6d 65 22 b8 | 4e 25 3a 4e 25 2b 3d 35 |icTime".|N%:N%+=5|
|00000260| 30 0d 01 22 4c 20 c8 99 | 22 57 69 6d 70 5f 50 6f |0.."L ..|"Wimp_Po|
|00000270| 6c 6c 49 64 6c 65 22 2c | 25 31 31 30 30 30 30 2c |llIdle",|%110000,|
|00000280| 62 6c 25 2c 4e 25 20 b8 | 20 72 65 61 73 6f 6e 25 |bl%,N% .| reason%|
|00000290| 3a e7 ac 20 71 75 69 74 | 25 20 f2 65 76 65 6e 74 |:.. quit|% .event|
|000002a0| 28 62 6c 25 2c 72 65 61 | 73 6f 6e 25 29 0d 01 2c |(bl%,rea|son%)..,|
|000002b0| 0a fd 71 75 69 74 25 0d | 01 36 0b f2 74 69 64 79 |..quit%.|.6..tidy|
|000002c0| 75 70 0d 01 40 05 e0 0d | 01 4a 04 0d 01 54 0c dd |up..@...|.J...T..|
|000002d0| f2 74 69 64 79 75 70 0d | 01 5e 2d 24 62 6c 25 3d |.tidyup.|.^-$bl%=|
|000002e0| 22 54 41 53 4b 22 3a c8 | 99 22 57 69 6d 70 5f 43 |"TASK":.|."Wimp_C|
|000002f0| 6c 6f 73 65 44 6f 77 6e | 22 2c 74 61 73 6b 25 2c |loseDown|",task%,|
|00000300| 21 62 6c 25 0d 01 68 05 | e1 0d 01 72 04 0d 01 7c |!bl%..h.|...r...||
|00000310| 17 dd f2 65 76 65 6e 74 | 28 62 25 2c 72 65 61 73 |...event|(b%,reas|
|00000320| 6f 6e 25 29 0d 01 86 0f | c8 8e 72 65 61 73 6f 6e |on%)....|..reason|
|00000330| 25 20 ca 0d 01 90 0d c9 | 30 3a f2 63 68 65 63 6b |% ......|0:.check|
|00000340| 0d 01 9a 17 c9 31 37 2c | 31 38 3a f2 72 65 63 65 |.....17,|18:.rece|
|00000350| 69 76 65 28 62 25 29 0d | 01 a4 05 cb 0d 01 ae 05 |ive(b%).|........|
|00000360| e1 0d 01 b8 04 0d 01 c2 | 11 dd f2 72 65 63 65 69 |........|...recei|
|00000370| 76 65 28 71 25 29 0d 01 | cc 0d c8 8e 71 25 21 31 |ve(q%)..|....q%!1|
|00000380| 36 20 ca 0d 01 d6 0e c9 | 30 3a 71 75 69 74 25 3d |6 ......|0:quit%=|
|00000390| b9 0d 01 e0 2a f4 20 57 | 48 45 4e 26 38 32 33 46 |....*. W|HEN&823F|
|000003a0| 31 3a 50 52 4f 43 74 72 | 66 65 6e 64 28 53 72 63 |1:PROCtr|fend(Src|
|000003b0| 24 2c 44 65 73 74 24 2c | 71 25 29 0d 01 ea 05 cb |$,Dest$,|q%).....|
|000003c0| 0d 01 f4 05 e1 0d 01 fe | 04 0d 02 08 0e dd f2 64 |........|.......d|
|000003d0| 6f 73 63 72 69 70 74 0d | 02 12 36 ea 20 46 24 2c |oscript.|..6. F$,|
|000003e0| 4d 24 2c 55 73 65 72 24 | 2c 50 61 73 73 24 2c 50 |M$,User$|,Pass$,P|
|000003f0| 6f 72 74 24 2c 50 61 73 | 73 25 2c 50 6f 72 74 25 |ort$,Pas|s%,Port%|
|00000400| 2c 54 79 70 65 24 2c 63 | 64 24 2c 50 25 0d 02 1c |,Type$,c|d$,P%...|
|00000410| 36 f2 70 61 72 73 65 6d | 61 63 28 4d 61 63 24 2c |6.parsem|ac(Mac$,|
|00000420| 20 55 73 65 72 24 2c 20 | 50 61 73 73 24 2c 20 50 | User$, |Pass$, P|
|00000430| 6f 72 74 24 2c 20 55 73 | 65 72 25 2c 20 50 61 73 |ort$, Us|er%, Pas|
|00000440| 73 25 29 0d 02 26 0f e7 | 20 ac 20 55 73 65 72 25 |s%)..&..| . User%|
|00000450| 20 8c 0d 02 30 19 20 20 | 55 73 65 72 24 20 3d 20 | ...0. |User$ = |
|00000460| 22 61 6e 6f 6e 79 6d 6f | 75 73 22 0d 02 3a 05 cd |"anonymo|us"..:..|
|00000470| 0d 02 44 0f e7 20 ac 20 | 50 61 73 73 25 20 8c 0d |..D.. . |Pass% ..|
|00000480| 02 4e 21 20 20 20 50 61 | 73 73 24 20 3d 20 22 7b |.N! Pa|ss$ = "{|
|00000490| 66 74 70 75 73 65 72 7d | 40 7b 68 6f 73 74 7d 22 |ftpuser}|@{host}"|
|000004a0| 0d 02 58 05 cd 0d 02 62 | 14 50 25 20 3d 20 a7 53 |..X....b|.P% = .S|
|000004b0| 72 63 24 2c 20 22 3b 22 | 29 0d 02 6c 0e e7 20 50 |rc$, ";"|)..l.. P|
|000004c0| 25 20 3e 20 30 20 8c 0d | 02 76 25 20 20 54 79 70 |% > 0 ..|.v% Typ|
|000004d0| 65 24 20 3d 20 a4 75 6e | 65 73 63 61 70 65 28 c1 |e$ = .un|escape(.|
|000004e0| 53 72 63 24 2c 20 50 25 | 2b 31 29 29 0d 02 80 19 |Src$, P%|+1))....|
|000004f0| 20 20 53 72 63 24 20 3d | 20 c0 53 72 63 24 2c 20 | Src$ =| .Src$, |
|00000500| 50 25 2d 31 29 0d 02 8a | 05 cc 0d 02 94 16 20 20 |P%-1)...|...... |
|00000510| 54 79 70 65 24 20 3d 20 | 22 74 79 70 65 3d 69 22 |Type$ = |"type=i"|
|00000520| 0d 02 9e 05 cd 0d 02 a8 | 15 50 25 20 3d 20 a7 54 |........|.P% = .T|
|00000530| 79 70 65 24 2c 20 22 3d | 22 29 0d 02 b2 0e e7 20 |ype$, "=|")..... |
|00000540| 50 25 20 3e 20 30 20 8c | 0d 02 bc 1b 20 20 54 79 |P% > 0 .|.... Ty|
|00000550| 70 65 24 20 3d 20 c1 54 | 79 70 65 24 2c 20 50 25 |pe$ = .T|ype$, P%|
|00000560| 2b 31 29 0d 02 c6 05 cd | 0d 02 d0 15 50 25 20 3d |+1).....|....P% =|
|00000570| 20 a7 54 79 70 65 24 2c | 20 22 20 22 29 0d 02 da | .Type$,| " ")...|
|00000580| 0e e7 20 50 25 20 3e 20 | 30 20 8c 0d 02 e4 1b 20 |.. P% > |0 ..... |
|00000590| 20 54 79 70 65 24 20 3d | 20 c1 54 79 70 65 24 2c | Type$ =| .Type$,|
|000005a0| 20 50 25 2b 31 29 0d 02 | ee 05 cd 0d 02 f8 16 c8 | P%+1)..|........|
|000005b0| 95 20 c0 53 72 63 24 2c | 20 31 29 20 3d 20 22 20 |. .Src$,| 1) = " |
|000005c0| 22 0d 03 02 16 20 20 53 | 72 63 24 20 3d 20 c1 53 |".... S|rc$ = .S|
|000005d0| 72 63 24 2c 20 32 29 0d | 03 0c 05 ce 0d 03 16 1c |rc$, 2).|........|
|000005e0| e7 20 53 72 63 24 20 3d | 20 22 22 20 8c 20 53 72 |. Src$ =| "" . Sr|
|000005f0| 63 24 20 3d 20 22 2f 22 | 0d 03 20 25 e7 20 28 54 |c$ = "/"|.. %. (T|
|00000600| 79 70 65 24 20 3d 20 22 | 64 22 29 20 84 20 28 54 |ype$ = "|d") . (T|
|00000610| 79 70 65 24 20 3d 20 22 | 44 22 29 20 8c 0d 03 2a |ype$ = "|D") ...*|
|00000620| 1a 20 20 e7 20 c2 53 72 | 63 24 2c 20 31 29 20 3c |. . .Sr|c$, 1) <|
|00000630| 3e 20 22 2f 22 20 8c 0d | 03 34 13 20 20 20 20 53 |> "/" ..|.4. S|
|00000640| 72 63 24 20 2b 3d 20 22 | 2f 22 0d 03 3e 13 20 20 |rc$ += "|/"..>. |
|00000650| 20 20 54 79 70 65 24 20 | 3d 20 22 61 22 0d 03 48 | Type$ |= "a"..H|
|00000660| 07 20 20 cd 0d 03 52 05 | cd 0d 03 5c 10 50 25 20 |. ...R.|...\.P% |
|00000670| 3d 20 a9 28 53 72 63 24 | 29 0d 03 66 1b c8 95 20 |= .(Src$|)..f... |
|00000680| c1 53 72 63 24 2c 20 50 | 25 2c 20 31 29 20 3c 3e |.Src$, P|%, 1) <>|
|00000690| 20 22 2f 22 0d 03 70 0d | 20 20 50 25 20 2d 3d 20 | "/"..p.| P% -= |
|000006a0| 31 0d 03 7a 05 ce 0d 03 | 84 23 46 69 6c 65 24 20 |1..z....|.#File$ |
|000006b0| 3d 20 a4 75 6e 65 73 63 | 61 70 65 28 c1 53 72 63 |= .unesc|ape(.Src|
|000006c0| 24 2c 20 50 25 2b 31 29 | 29 0d 03 8e 17 53 72 63 |$, P%+1)|)....Src|
|000006d0| 24 20 3d 20 c0 53 72 63 | 24 2c 20 50 25 2d 31 29 |$ = .Src|$, P%-1)|
|000006e0| 0d 03 98 14 53 72 63 24 | 20 3d 20 c1 53 72 63 24 |....Src$| = .Src$|
|000006f0| 2c 20 32 29 0d 03 a2 35 | 73 63 72 69 70 74 25 20 |, 2)...5|script% |
|00000700| 3d 20 ae 28 22 3c 57 69 | 6d 70 24 53 63 72 61 70 |= .("<Wi|mp$Scrap|
|00000710| 44 69 72 3e 2e 57 65 62 | 73 74 65 72 2e 54 65 6d |Dir>.Web|ster.Tem|
|00000720| 70 53 63 72 69 70 74 22 | 29 0d 03 ac 25 d5 23 73 |pScript"|)...%.#s|
|00000730| 63 72 69 70 74 25 2c 20 | 22 66 74 70 20 22 20 2b |cript%, |"ftp " +|
|00000740| 20 4d 61 63 24 20 2b 20 | 50 6f 72 74 24 3b 0d 03 | Mac$ + |Port$;..|
|00000750| b6 28 d5 23 73 63 72 69 | 70 74 25 2c 20 22 20 5c |.(.#scri|pt%, " \|
|00000760| 20 40 46 54 50 55 74 69 | 6c 20 59 56 31 30 30 20 | @FTPUti|l YV100 |
|00000770| 59 45 32 34 22 3b 0d 03 | c0 35 d5 23 73 63 72 69 |YE24";..|.5.#scri|
|00000780| 70 74 25 2c 20 22 20 5c | 20 22 22 6e 61 6d 65 3a |pt%, " \| ""name:|
|00000790| 20 22 22 20 22 22 22 20 | 2b 20 55 73 65 72 24 20 | "" """ |+ User$ |
|000007a0| 2b 20 22 5c 72 5c 6e 22 | 22 22 3b 0d 03 ca 32 d5 |+ "\r\n"|"";...2.|
|000007b0| 23 73 63 72 69 70 74 25 | 2c 20 22 20 22 22 77 6f |#script%|, " ""wo|
|000007c0| 72 64 3a 22 22 20 22 22 | 22 20 2b 20 50 61 73 73 |rd:"" ""|" + Pass|
|000007d0| 24 20 2b 20 22 5c 72 5c | 6e 22 22 22 3b 0d 03 d4 |$ + "\r\|n""";...|
|000007e0| 12 e7 20 53 72 63 24 20 | 3c 3e 20 22 22 20 8c 0d |.. Src$ |<> "" ..|
|000007f0| 03 de 07 20 20 f5 0d 03 | e8 18 20 20 20 20 50 25 |... ...|.. P%|
|00000800| 20 3d 20 a7 53 72 63 24 | 2c 20 22 2f 22 29 0d 03 | = .Src$|, "/")..|
|00000810| f2 12 20 20 20 20 e7 20 | 50 25 20 3e 20 30 20 8c |.. . |P% > 0 .|
|00000820| 0d 03 fc 1c 20 20 20 20 | 20 20 63 64 24 20 3d 20 |.... | cd$ = |
|00000830| c0 53 72 63 24 2c 20 50 | 25 2d 31 29 0d 04 06 1d |.Src$, P|%-1)....|
|00000840| 20 20 20 20 20 20 53 72 | 63 24 20 3d 20 c1 53 72 | Sr|c$ = .Sr|
|00000850| 63 24 2c 20 50 25 2b 31 | 29 0d 04 10 09 20 20 20 |c$, P%+1|).... |
|00000860| 20 cc 0d 04 1a 14 20 20 | 20 20 20 20 63 64 24 20 | ..... | cd$ |
|00000870| 3d 20 53 72 63 24 0d 04 | 24 09 20 20 20 20 cd 0d |= Src$..|$. ..|
|00000880| 04 2e 1c 20 20 20 20 63 | 64 24 20 3d 20 a4 75 6e |... c|d$ = .un|
|00000890| 65 73 63 61 70 65 28 63 | 64 24 29 0d 04 38 34 20 |escape(c|d$)..84 |
|000008a0| 20 20 20 d5 23 73 63 72 | 69 70 74 25 2c 20 22 20 | .#scr|ipt%, " |
|000008b0| 22 22 3e 20 22 22 20 22 | 22 63 64 20 22 20 2b 20 |""> "" "|"cd " + |
|000008c0| 63 64 24 20 2b 20 22 5c | 72 5c 6e 22 22 22 3b 0d |cd$ + "\|r\n""";.|
|000008d0| 04 42 0e 20 20 fd 20 50 | 25 20 3d 20 30 0d 04 4c |.B. . P|% = 0..L|
|000008e0| 05 cd 0d 04 56 13 e7 20 | 46 69 6c 65 24 20 3c 3e |....V.. |File$ <>|
|000008f0| 20 22 22 20 8c 0d 04 60 | 2a 20 20 d5 23 73 63 72 | "" ...`|* .#scr|
|00000900| 69 70 74 25 2c 20 22 20 | 22 22 3e 20 22 22 20 22 |ipt%, " |""> "" "|
|00000910| 22 68 61 73 68 20 31 5c | 72 5c 6e 22 22 22 3b 0d |"hash 1\|r\n""";.|
|00000920| 04 6a 36 20 20 d5 23 73 | 63 72 69 70 74 25 2c 20 |.j6 .#s|cript%, |
|00000930| 22 20 22 22 3e 20 22 22 | 20 22 22 74 79 70 65 20 |" ""> ""| ""type |
|00000940| 22 20 2b 20 54 79 70 65 | 24 20 2b 20 22 5c 72 5c |" + Type|$ + "\r\|
|00000950| 6e 22 22 22 3b 0d 04 74 | 47 20 20 d5 23 73 63 72 |n""";..t|G .#scr|
|00000960| 69 70 74 25 2c 20 22 20 | 22 22 3e 20 22 22 20 22 |ipt%, " |""> "" "|
|00000970| 22 67 65 74 20 22 20 2b | 20 46 69 6c 65 24 20 2b |"get " +| File$ +|
|00000980| 20 22 20 22 20 2b 20 54 | 65 6d 70 44 65 73 74 24 | " " + T|empDest$|
|00000990| 20 2b 20 22 5c 72 5c 6e | 22 22 22 3b 0d 04 7e 0e | + "\r\n|""";..~.|
|000009a0| 20 20 69 73 64 69 72 25 | 3d a3 0d 04 88 05 cc 0d | isdir%|=.......|
|000009b0| 04 92 3b 20 20 d5 23 73 | 63 72 69 70 74 25 2c 20 |..; .#s|cript%, |
|000009c0| 22 20 22 22 3e 20 22 22 | 20 22 22 64 69 72 20 2a |" ""> ""| ""dir *|
|000009d0| 20 22 20 2b 20 54 65 6d | 70 44 65 73 74 24 20 2b | " + Tem|pDest$ +|
|000009e0| 20 22 5c 72 5c 6e 22 22 | 22 3b 0d 04 9c 0e 20 20 | "\r\n""|";.... |
|000009f0| 69 73 64 69 72 25 3d b9 | 0d 04 a6 05 cd 0d 04 b0 |isdir%=.|........|
|00000a00| 2a d5 23 73 63 72 69 70 | 74 25 2c 20 22 20 22 22 |*.#scrip|t%, " ""|
|00000a10| 3e 20 22 22 20 22 22 77 | 69 6e 63 6c 6f 73 65 5c |> "" ""w|inclose\|
|00000a20| 72 5c 6e 22 22 22 3b 0d | 04 ba 26 d5 23 73 63 72 |r\n""";.|..&.#scr|
|00000a30| 69 70 74 25 2c 20 22 20 | 22 22 3e 20 22 22 20 22 |ipt%, " |""> "" "|
|00000a40| 22 71 75 69 74 5c 72 5c | 6e 22 22 22 3b 0d 04 c4 |"quit\r\|n""";...|
|00000a50| 0d d9 23 73 63 72 69 70 | 74 25 0d 04 ce 18 ff 22 |..#scrip|t%....."|
|00000a60| 52 65 6d 6f 76 65 20 22 | 2b 54 65 6d 70 44 65 73 |Remove "|+TempDes|
|00000a70| 74 24 0d 04 d8 05 e1 0d | 04 e2 04 0d 04 ec 0b dd |t$......|........|
|00000a80| f2 64 6f 66 74 70 0d 04 | f6 3c 24 28 62 6c 25 2b |.doftp..|.<$(bl%+|
|00000a90| 32 30 29 3d 22 73 6f 75 | 72 63 65 20 3c 57 69 6d |20)="sou|rce <Wim|
|00000aa0| 70 24 53 63 72 61 70 44 | 69 72 3e 2e 57 65 62 73 |p$ScrapD|ir>.Webs|
|00000ab0| 74 65 72 2e 54 65 6d 70 | 53 63 72 69 70 74 22 2b |ter.Temp|Script"+|
|00000ac0| bd 30 0d 05 00 1a 62 6c | 25 21 31 32 3d 30 3a 62 |.0....bl|%!12=0:b|
|00000ad0| 6c 25 21 31 36 3d 26 38 | 32 33 46 30 0d 05 0a 48 |l%!16=&8|23F0...H|
|00000ae0| 21 62 6c 25 3d 28 32 31 | 2b a9 24 28 62 6c 25 2b |!bl%=(21|+.$(bl%+|
|00000af0| 32 30 29 2b 34 29 80 26 | 46 43 3a c8 99 20 22 57 |20)+4).&|FC:.. "W|
|00000b00| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|00000b10| 2c 31 37 2c 62 6c 25 2c | 30 3a 72 65 66 25 3d 62 |,17,bl%,|0:ref%=b|
|00000b20| 6c 25 21 38 0d 05 14 10 | f4 20 71 75 69 74 25 3d |l%!8....|. quit%=|
|00000b30| 54 52 55 45 0d 05 1e 05 | e1 0d 05 28 04 0d 05 32 |TRUE....|...(...2|
|00000b40| 0b dd f2 63 68 65 63 6b | 0d 05 3c 06 ea 85 0d 05 |...check|..<.....|
|00000b50| 46 2d ee 85 ea 20 ff 22 | 53 45 54 20 58 46 54 50 |F-... ."|SET XFTP|
|00000b60| 45 52 52 4f 52 20 22 2b | f6 24 2b 22 20 61 74 20 |ERROR "+|.$+" at |
|00000b70| 6c 69 6e 65 20 22 2b c3 | 9e 3a e1 0d 05 50 14 63 |line "+.|.:...P.c|
|00000b80| 68 25 3d ad 28 54 65 6d | 70 44 65 73 74 24 29 0d |h%=.(Tem|pDest$).|
|00000b90| 05 5a 0c e7 63 68 25 3e | 30 20 8c 0d 05 64 0c 20 |.Z..ch%>|0 ...d. |
|00000ba0| 71 75 69 74 25 3d b9 0d | 05 6e 3e 20 46 24 3d 22 |quit%=..|.n> F$="|
|00000bb0| 22 3a 43 25 3d 9a 23 63 | 68 25 3a c8 95 ac c5 23 |":C%=.#c|h%:....#|
|00000bc0| 63 68 25 20 80 a9 46 24 | 3c 32 30 30 80 43 25 3e |ch% ..F$|<200.C%>|
|00000bd0| 33 31 3a 46 24 2b 3d bd | 43 25 3a 43 25 3d 9a 23 |31:F$+=.|C%:C%=.#|
|00000be0| 63 68 25 3a ce 0d 05 78 | 36 20 e7 28 c2 46 24 2c |ch%:...x|6 .(.F$,|
|00000bf0| 35 29 3d 22 62 79 74 65 | 73 22 20 80 20 c1 46 24 |5)="byte|s" . .F$|
|00000c00| 2c 32 38 2c 31 29 3d 22 | 3a 22 29 84 46 24 3d 22 |,28,1)="|:").F$="|
|00000c10| 22 20 80 69 73 64 69 72 | 25 20 8c 0d 05 82 11 20 |" .isdir|% ..... |
|00000c20| 20 f2 6c 6f 63 61 6c 28 | 63 68 25 29 0d 05 8c 11 | .local(|ch%)....|
|00000c30| 20 20 d9 23 63 68 25 3a | 63 68 25 3d 30 0d 05 96 | .#ch%:|ch%=0...|
|00000c40| 06 20 cc 0d 05 a0 36 20 | 20 f4 20 73 68 6f 75 6c |. ....6 | . shoul|
|00000c50| 64 20 6d 61 74 63 68 20 | 72 65 6d 6f 74 65 20 64 |d match |remote d|
|00000c60| 69 72 65 63 74 6f 72 79 | 20 6c 69 73 74 69 6e 67 |irectory| listing|
|00000c70| 20 28 49 20 48 6f 70 65 | 29 0d 05 aa 7f 20 20 e7 | (I Hope|).... .|
|00000c80| 28 28 28 a7 c0 46 24 2c | 31 30 29 2c 22 2d 22 29 |(((..F$,|10),"-")|
|00000c90| 3e 30 84 c0 46 24 2c 31 | 29 3d 22 64 22 29 20 80 |>0..F$,1|)="d") .|
|00000ca0| a7 c0 46 24 2c 31 30 29 | 2c 22 72 22 29 3e 30 20 |..F$,10)|,"r")>0 |
|00000cb0| 80 c1 46 24 2c 31 31 2c | 31 29 3d 22 20 22 20 80 |..F$,11,|1)=" " .|
|00000cc0| a9 46 24 3e 34 30 29 20 | 84 28 c0 46 24 2c 36 29 |.F$>40) |.(.F$,6)|
|00000cd0| 3d 22 74 6f 74 61 6c 20 | 22 20 80 36 2b a9 c3 28 |="total |" .6+..(|
|00000ce0| bb c1 46 24 2c 37 29 29 | 3d a9 46 24 29 29 20 80 |..F$,7))|=.F$)) .|
|00000cf0| 69 73 64 69 72 25 20 8c | 0d 05 b4 13 20 20 20 f2 |isdir% .|.... .|
|00000d00| 72 65 6d 6f 74 65 28 63 | 68 25 29 0d 05 be 12 20 |remote(c|h%).... |
|00000d10| 20 20 d9 23 63 68 25 3a | 63 68 25 3d 30 0d 05 c8 | .#ch%:|ch%=0...|
|00000d20| 07 20 20 cc 0d 05 d2 12 | 20 20 20 d9 23 63 68 25 |. .....| .#ch%|
|00000d30| 3a 63 68 25 3d 30 0d 05 | dc 0e 20 20 20 f2 63 6f |:ch%=0..|.. .co|
|00000d40| 70 79 69 74 0d 05 e6 07 | 20 20 cd 0d 05 f0 06 20 |pyit....| ..... |
|00000d50| cd 0d 05 fa 19 20 ff 22 | 52 65 6d 6f 76 65 20 22 |..... ."|Remove "|
|00000d60| 2b 54 65 6d 70 44 65 73 | 74 24 0d 06 04 05 cd 0d |+TempDes|t$......|
|00000d70| 06 0e 05 e1 0d 06 18 04 | 0d 06 22 0c dd f2 63 6f |........|.."...co|
|00000d80| 70 79 69 74 0d 06 2c 2c | c8 99 22 58 4f 53 5f 46 |pyit..,,|.."XOS_F|
|00000d90| 53 43 6f 6e 74 72 6f 6c | 22 2c 32 35 2c 54 65 6d |SControl|",25,Tem|
|00000da0| 70 44 65 73 74 24 2c 44 | 65 73 74 24 b8 3b 46 25 |pDest$,D|est$.;F%|
|00000db0| 0d 06 36 39 e7 28 46 25 | 80 31 29 3e 30 20 c8 99 |..69.(F%|.1)>0 ..|
|00000dc0| 22 58 4f 53 5f 46 53 43 | 6f 6e 74 72 6f 6c 22 2c |"XOS_FSC|ontrol",|
|00000dd0| 32 36 2c 54 65 6d 70 44 | 65 73 74 24 2c 44 65 73 |26,TempD|est$,Des|
|00000de0| 74 24 2c 28 31 3c 3c 37 | 29 0d 06 40 1d ff 22 53 |t$,(1<<7|)..@.."S|
|00000df0| 65 74 54 79 70 65 20 22 | 2b 44 65 73 74 24 2b 22 |etType "|+Dest$+"|
|00000e00| 20 26 46 46 44 22 0d 06 | 4a 05 e1 0d 06 54 04 0d | &FFD"..|J....T..|
|00000e10| 06 5e 0f dd f2 6c 6f 63 | 61 6c 28 46 25 29 0d 06 |.^...loc|al(F%)..|
|00000e20| 68 0a cf 23 46 25 3d 30 | 0d 06 72 15 e7 53 72 63 |h..#F%=0|..r..Src|
|00000e30| 24 3d 22 22 20 53 72 63 | 24 3d 22 2f 22 0d 06 7c |$="" Src|$="/"..||
|00000e40| 0f 4f 25 3d ae 28 44 65 | 73 74 24 29 0d 06 86 52 |.O%=.(De|st$)...R|
|00000e50| d5 23 4f 25 2c 22 3c 48 | 54 4d 4c 3e 3c 48 45 41 |.#O%,"<H|TML><HEA|
|00000e60| 44 3e 3c 54 69 74 6c 65 | 3e 49 6e 64 65 78 20 6f |D><Title|>Index o|
|00000e70| 66 20 22 2b 53 72 63 24 | 2b 22 20 66 72 6f 6d 20 |f "+Src$|+" from |
|00000e80| 22 2b 4d 61 63 24 2b 22 | 3c 2f 54 69 74 6c 65 3e |"+Mac$+"|</Title>|
|00000e90| 3c 2f 48 45 41 44 3e 3c | 42 4f 44 59 3e 22 0d 06 |</HEAD><|BODY>"..|
|00000ea0| 90 33 d5 23 4f 25 2c 22 | 3c 48 31 3e 49 6e 64 65 |.3.#O%,"|<H1>Inde|
|00000eb0| 78 20 6f 66 20 22 2b 53 | 72 63 24 2b 22 20 66 72 |x of "+S|rc$+" fr|
|00000ec0| 6f 6d 20 22 2b 4d 61 63 | 24 2b 22 3c 2f 48 31 3e |om "+Mac|$+"</H1>|
|00000ed0| 22 0d 06 9a 0f d5 23 4f | 25 2c 22 3c 68 72 3e 22 |".....#O|%,"<hr>"|
|00000ee0| 0d 06 a4 10 d5 23 4f 25 | 2c 22 3c 50 52 45 3e 22 |.....#O%|,"<PRE>"|
|00000ef0| 0d 06 ae 5c e7 53 72 63 | 24 3c 3e 22 2f 22 20 d5 |...\.Src|$<>"/" .|
|00000f00| 23 4f 25 2c 22 3c 41 20 | 48 52 45 46 3d 22 22 2e |#O%,"<A |HREF="".|
|00000f10| 2e 2f 22 22 3e 3c 49 4d | 47 20 41 4c 54 3d 22 22 |./""><IM|G ALT=""|
|00000f20| 55 50 20 22 22 20 53 52 | 43 3d 22 22 23 73 6d 61 |UP "" SR|C=""#sma|
|00000f30| 6c 6c 5f 64 69 72 22 22 | 3e 50 72 65 76 69 6f 75 |ll_dir""|>Previou|
|00000f40| 73 20 44 69 72 65 63 74 | 6f 72 79 22 0d 06 b8 0b |s Direct|ory"....|
|00000f50| c8 95 ac c5 23 46 25 0d | 06 c2 1a 20 f5 3a 41 24 |....#F%.|... .:A$|
|00000f60| 3d be 23 46 25 3a fd a9 | 41 24 3e 30 84 c5 23 46 |=.#F%:..|A$>0..#F|
|00000f70| 25 0d 06 cc 0c 20 e7 a9 | 41 24 3e 30 8c 0d 06 d6 |%.... ..|A$>0....|
|00000f80| 0d 20 20 41 24 2b 3d 22 | 20 22 0d 06 e0 16 20 20 |. A$+="| ".... |
|00000f90| 50 25 3d a7 41 24 2c 22 | 20 22 29 3a 66 25 3d 31 |P%=.A$,"| "):f%=1|
|00000fa0| 0d 06 ea 0d 20 20 c8 95 | a9 41 24 3e 30 0d 06 f4 |.... ..|.A$>0...|
|00000fb0| 4c 20 20 20 46 24 28 66 | 25 29 3d c0 41 24 2c 50 |L F$(f|%)=.A$,P|
|00000fc0| 25 2d 31 29 3a 41 24 3d | c1 41 24 2c 50 25 2b 31 |%-1):A$=|.A$,P%+1|
|00000fd0| 29 3a c8 95 97 41 24 3d | 33 32 3a 41 24 3d c1 41 |):...A$=|32:A$=.A|
|00000fe0| 24 2c 32 29 3a ce 3a 66 | 25 2b 3d 31 3a 50 25 3d |$,2):.:f|%+=1:P%=|
|00000ff0| a7 41 24 2c 22 20 22 29 | 3a 0d 06 fe 07 20 20 ce |.A$," ")|:.... .|
|00001000| 0d 07 08 43 20 20 e7 46 | 24 28 33 29 3d 22 44 69 |...C .F|$(3)="Di|
|00001010| 72 65 63 74 6f 72 79 22 | 20 46 24 28 31 29 2b 3d |rectory"| F$(1)+=|
|00001020| 22 2f 22 3a 49 24 3d 22 | 23 73 6d 61 6c 6c 5f 64 |"/":I$="|#small_d|
|00001030| 69 72 22 8b 49 24 3d 22 | 23 73 6d 61 6c 6c 5f 78 |ir".I$="|#small_x|
|00001040| 78 78 22 0d 07 12 7b 20 | 20 d5 23 4f 25 2c 22 3c |xx"...{ | .#O%,"<|
|00001050| 41 20 48 52 45 46 3d 22 | 22 22 2b 46 24 28 31 29 |A HREF="|""+F$(1)|
|00001060| 2b 22 22 22 3e 3c 49 4d | 47 20 41 4c 54 3d 22 22 |+"""><IM|G ALT=""|
|00001070| 22 2b 46 24 28 33 29 2b | 22 22 22 20 53 52 43 3d |"+F$(3)+|""" SRC=|
|00001080| 22 22 22 2b 49 24 2b 22 | 22 22 3e 22 2b c0 46 24 |"""+I$+"|"">"+.F$|
|00001090| 28 31 29 2c 32 30 29 2b | 22 3c 2f 41 3e 22 2b c4 |(1),20)+|"</A>"+.|
|000010a0| 32 30 2d a9 46 24 28 31 | 29 2c bd 33 32 29 2b 46 |20-.F$(1|),.32)+F|
|000010b0| 24 28 36 29 2b 22 20 22 | 2b 46 24 28 37 29 0d 07 |$(6)+" "|+F$(7)..|
|000010c0| 1c 06 20 cd 0d 07 26 05 | ce 0d 07 30 23 d5 23 4f |.. ...&.|...0#.#O|
|000010d0| 25 2c 22 3c 2f 50 52 45 | 3e 3c 68 72 3e 3c 2f 42 |%,"</PRE|><hr></B|
|000010e0| 4f 44 59 3e 3c 2f 48 54 | 4d 4c 3e 22 0d 07 3a 0b |ODY></HT|ML>"..:.|
|000010f0| d5 23 4f 25 2c 91 24 0d | 07 44 0d d9 23 4f 25 3a |.#O%,.$.|.D..#O%:|
|00001100| 4f 25 3d 30 0d 07 4e 1d | ff 22 53 65 74 54 79 70 |O%=0..N.|."SetTyp|
|00001110| 65 20 22 2b 44 65 73 74 | 24 2b 22 20 48 54 4d 4c |e "+Dest|$+" HTML|
|00001120| 22 0d 07 58 05 e1 0d 07 | 62 04 0d 07 6c 18 f4 20 |"..X....|b...l.. |
|00001130| 46 69 65 6c 64 20 35 20 | 3d 20 46 69 6c 65 73 69 |Field 5 |= Filesi|
|00001140| 7a 65 0d 07 76 18 f4 20 | 46 69 65 6c 64 20 39 20 |ze..v.. |Field 9 |
|00001150| 3d 20 46 69 6c 65 6e 61 | 6d 65 0d 07 80 10 dd f2 |= Filena|me......|
|00001160| 72 65 6d 6f 74 65 28 46 | 25 29 0d 07 8a 0a cf 23 |remote(F|%).....#|
|00001170| 46 25 3d 30 0d 07 94 15 | e7 53 72 63 24 3d 22 22 |F%=0....|.Src$=""|
|00001180| 20 53 72 63 24 3d 22 2f | 22 0d 07 9e 0f 4f 25 3d | Src$="/|"....O%=|
|00001190| ae 28 44 65 73 74 24 29 | 0d 07 a8 52 d5 23 4f 25 |.(Dest$)|...R.#O%|
|000011a0| 2c 22 3c 48 54 4d 4c 3e | 3c 48 45 41 44 3e 3c 54 |,"<HTML>|<HEAD><T|
|000011b0| 69 74 6c 65 3e 49 6e 64 | 65 78 20 6f 66 20 22 2b |itle>Ind|ex of "+|
|000011c0| 53 72 63 24 2b 22 20 66 | 72 6f 6d 20 22 2b 4d 61 |Src$+" f|rom "+Ma|
|000011d0| 63 24 2b 22 3c 2f 54 69 | 74 6c 65 3e 3c 2f 48 45 |c$+"</Ti|tle></HE|
|000011e0| 41 44 3e 3c 42 4f 44 59 | 3e 22 0d 07 b2 33 d5 23 |AD><BODY|>"...3.#|
|000011f0| 4f 25 2c 22 3c 48 31 3e | 49 6e 64 65 78 20 6f 66 |O%,"<H1>|Index of|
|00001200| 20 22 2b 53 72 63 24 2b | 22 20 66 72 6f 6d 20 22 | "+Src$+|" from "|
|00001210| 2b 4d 61 63 24 2b 22 3c | 2f 48 31 3e 22 0d 07 bc |+Mac$+"<|/H1>"...|
|00001220| 0f d5 23 4f 25 2c 22 3c | 68 72 3e 22 0d 07 c6 10 |..#O%,"<|hr>"....|
|00001230| d5 23 4f 25 2c 22 3c 50 | 52 45 3e 22 0d 07 d0 5c |.#O%,"<P|RE>"...\|
|00001240| e7 53 72 63 24 3c 3e 22 | 2f 22 20 d5 23 4f 25 2c |.Src$<>"|/" .#O%,|
|00001250| 22 3c 41 20 48 52 45 46 | 3d 22 22 2e 2e 2f 22 22 |"<A HREF|=""../""|
|00001260| 3e 3c 49 4d 47 20 41 4c | 54 3d 22 22 55 50 20 22 |><IMG AL|T=""UP "|
|00001270| 22 20 53 52 43 3d 22 22 | 23 73 6d 61 6c 6c 5f 64 |" SRC=""|#small_d|
|00001280| 69 72 22 22 3e 50 72 65 | 76 69 6f 75 73 20 44 69 |ir"">Pre|vious Di|
|00001290| 72 65 63 74 6f 72 79 22 | 0d 07 da 0b c8 95 ac c5 |rectory"|........|
|000012a0| 23 46 25 0d 07 e4 1a 20 | f5 3a 41 24 3d be 23 46 |#F%.... |.:A$=.#F|
|000012b0| 25 3a fd a9 41 24 3e 30 | 84 c5 23 46 25 0d 07 ee |%:..A$>0|..#F%...|
|000012c0| 17 20 e7 c0 41 24 2c 36 | 29 3d 22 74 6f 74 61 6c |. ..A$,6|)="total|
|000012d0| 20 22 20 8c 0d 07 f8 0b | 20 20 54 24 3d 41 24 0d | " .....| T$=A$.|
|000012e0| 08 02 06 20 cc 0d 08 0c | 0d 20 20 e7 a9 41 24 3e |... ....|. ..A$>|
|000012f0| 30 8c 0d 08 16 0e 20 20 | 20 41 24 2b 3d 22 20 22 |0..... | A$+=" "|
|00001300| 0d 08 20 17 20 20 20 50 | 25 3d a7 41 24 2c 22 20 |.. . P|%=.A$," |
|00001310| 22 29 3a 66 25 3d 31 0d | 08 2a 0e 20 20 20 c8 95 |"):f%=1.|.*. ..|
|00001320| a9 41 24 3e 30 0d 08 34 | 4d 20 20 20 20 46 24 28 |.A$>0..4|M F$(|
|00001330| 66 25 29 3d c0 41 24 2c | 50 25 2d 31 29 3a 41 24 |f%)=.A$,|P%-1):A$|
|00001340| 3d c1 41 24 2c 50 25 2b | 31 29 3a c8 95 97 41 24 |=.A$,P%+|1):...A$|
|00001350| 3d 33 32 3a 41 24 3d c1 | 41 24 2c 32 29 3a ce 3a |=32:A$=.|A$,2):.:|
|00001360| 66 25 2b 3d 31 3a 50 25 | 3d a7 41 24 2c 22 20 22 |f%+=1:P%|=.A$," "|
|00001370| 29 3a 0d 08 3e 08 20 20 | 20 ce 0d 08 48 0f 20 20 |):..>. | ...H. |
|00001380| 20 66 24 3d 46 24 28 39 | 29 0d 08 52 4c 20 20 20 | f$=F$(9|)..RL |
|00001390| e7 c0 41 24 2c 31 29 3d | 22 64 22 20 64 24 3d 22 |..A$,1)=|"d" d$="|
|000013a0| 44 69 72 22 3a 66 24 2b | 3d 22 2f 22 3a 49 24 3d |Dir":f$+|="/":I$=|
|000013b0| 22 23 73 6d 61 6c 6c 5f | 64 69 72 22 8b 49 24 3d |"#small_|dir".I$=|
|000013c0| 22 23 73 6d 61 6c 6c 5f | 78 78 78 22 3a 64 24 3d |"#small_|xxx":d$=|
|000013d0| 22 20 20 20 22 0d 08 5c | 66 20 20 20 d5 23 4f 25 |" "..\|f .#O%|
|000013e0| 2c 22 3c 41 20 48 52 45 | 46 3d 22 22 22 2b 66 24 |,"<A HRE|F="""+f$|
|000013f0| 2b 22 22 22 3e 3c 49 4d | 47 20 41 4c 54 3d 22 22 |+"""><IM|G ALT=""|
|00001400| 22 2b 64 24 2b 22 22 22 | 20 53 52 43 3d 22 22 22 |"+d$+"""| SRC="""|
|00001410| 2b 49 24 2b 22 22 22 3e | 22 2b c0 66 24 2c 32 30 |+I$+""">|"+.f$,20|
|00001420| 29 2b 22 3c 2f 41 3e 22 | 2b c4 32 30 2d a9 66 24 |)+"</A>"|+.20-.f$|
|00001430| 2c bd 33 32 29 2b 46 24 | 28 35 29 0d 08 66 07 20 |,.32)+F$|(5)..f. |
|00001440| 20 cd 0d 08 70 06 20 cd | 0d 08 7a 05 ce 0d 08 84 | ...p. .|..z.....|
|00001450| 11 d5 23 4f 25 2c 22 3c | 2f 50 52 45 3e 22 0d 08 |..#O%,"<|/PRE>"..|
|00001460| 8e 1d d5 23 4f 25 2c 22 | 3c 68 72 3e 3c 2f 42 4f |...#O%,"|<hr></BO|
|00001470| 44 59 3e 3c 2f 48 54 4d | 4c 3e 22 0d 08 98 0b d5 |DY></HTM|L>".....|
|00001480| 23 4f 25 2c 91 24 0d 08 | a2 0d d9 23 4f 25 3a 4f |#O%,.$..|...#O%:O|
|00001490| 25 3d 30 0d 08 ac 1d ff | 22 53 65 74 54 79 70 65 |%=0.....|"SetType|
|000014a0| 20 22 2b 44 65 73 74 24 | 2b 22 20 48 54 4d 4c 22 | "+Dest$|+" HTML"|
|000014b0| 0d 08 b6 05 e1 0d 08 c0 | 04 0d 08 ca 12 dd f2 65 |........|.......e|
|000014c0| 72 72 6f 72 28 45 24 2c | 4c 25 29 0d 08 d4 19 e7 |rror(E$,|L%).....|
|000014d0| 4f 25 3e 30 20 5a 25 3d | 4f 25 3a 4f 25 3d 30 3a |O%>0 Z%=|O%:O%=0:|
|000014e0| d9 23 5a 25 0d 08 de 1c | e7 63 68 25 3e 30 20 5a |.#Z%....|.ch%>0 Z|
|000014f0| 25 3d 63 68 25 3a 63 68 | 25 3d 30 3a d9 23 5a 25 |%=ch%:ch|%=0:.#Z%|
|00001500| 0d 08 e8 28 ff 22 53 45 | 54 20 58 46 54 50 45 52 |...(."SE|T XFTPER|
|00001510| 52 4f 52 20 22 2b 45 24 | 2b 22 20 61 74 20 6c 69 |ROR "+E$|+" at li|
|00001520| 6e 65 20 22 2b c3 4c 25 | 0d 08 f2 05 e1 0d 08 fc |ne "+.L%|........|
|00001530| 04 0d 09 06 43 dd f2 70 | 61 72 73 65 6d 61 63 28 |....C..p|arsemac(|
|00001540| f8 20 4d 61 63 24 2c 20 | f8 20 55 73 65 72 24 2c |. Mac$, |. User$,|
|00001550| 20 f8 20 50 61 73 73 24 | 2c 20 f8 20 50 6f 72 74 | . Pass$|, . Port|
|00001560| 24 2c 20 f8 20 55 73 65 | 72 25 2c 20 f8 20 50 61 |$, . Use|r%, . Pa|
|00001570| 73 73 25 29 0d 09 10 08 | ea 20 50 25 0d 09 1a 13 |ss%)....|. P%....|
|00001580| 50 25 20 3d 20 a7 4d 61 | 63 24 2c 22 2f 22 29 0d |P% = .Ma|c$,"/").|
|00001590| 09 24 0e e7 20 50 25 20 | 3e 20 30 20 8c 0d 09 2e |.$.. P% |> 0 ....|
|000015a0| 19 20 20 4d 61 63 24 20 | 3d 20 c1 4d 61 63 24 2c |. Mac$ |= .Mac$,|
|000015b0| 20 50 25 2d 31 29 0d 09 | 38 05 cd 0d 09 42 13 50 | P%-1)..|8....B.P|
|000015c0| 25 20 3d 20 a7 4d 61 63 | 24 2c 22 40 22 29 0d 09 |% = .Mac|$,"@")..|
|000015d0| 4c 0e e7 20 50 25 20 3e | 20 30 20 8c 0d 09 56 0f |L.. P% >| 0 ...V.|
|000015e0| 20 20 55 73 65 72 25 20 | 3d 20 b9 0d 09 60 1c 20 | User% |= ...`. |
|000015f0| 20 55 73 65 72 24 20 3d | 20 28 c0 4d 61 63 24 2c | User$ =| (.Mac$,|
|00001600| 20 50 25 2d 31 29 29 0d | 09 6a 1b 20 20 4d 61 63 | P%-1)).|.j. Mac|
|00001610| 24 20 3d 20 28 c1 4d 61 | 63 24 2c 20 50 25 2b 31 |$ = (.Ma|c$, P%+1|
|00001620| 29 29 0d 09 74 05 cc 0d | 09 7e 0f 20 20 55 73 65 |))..t...|.~. Use|
|00001630| 72 25 20 3d 20 a3 0d 09 | 88 10 20 20 55 73 65 72 |r% = ...|.. User|
|00001640| 24 20 3d 20 22 22 0d 09 | 92 05 cd 0d 09 9c 15 50 |$ = ""..|.......P|
|00001650| 25 20 3d 20 a7 55 73 65 | 72 24 2c 20 22 3a 22 29 |% = .Use|r$, ":")|
|00001660| 0d 09 a6 0e e7 20 50 25 | 20 3e 20 30 20 8c 0d 09 |..... P%| > 0 ...|
|00001670| b0 0f 20 20 50 61 73 73 | 25 20 3d 20 b9 0d 09 ba |.. Pass|% = ....|
|00001680| 1b 20 20 50 61 73 73 24 | 20 3d 20 c1 55 73 65 72 |. Pass$| = .User|
|00001690| 24 2c 20 50 25 2b 31 29 | 0d 09 c4 1b 20 20 55 73 |$, P%+1)|.... Us|
|000016a0| 65 72 24 20 3d 20 c0 55 | 73 65 72 24 2c 20 50 25 |er$ = .U|ser$, P%|
|000016b0| 2d 31 29 0d 09 ce 05 cc | 0d 09 d8 0f 20 20 50 61 |-1).....|.... Pa|
|000016c0| 73 73 25 20 3d 20 a3 0d | 09 e2 10 20 20 50 61 73 |ss% = ..|... Pas|
|000016d0| 73 24 20 3d 20 22 22 0d | 09 ec 05 cd 0d 09 f6 11 |s$ = "".|........|
|000016e0| 50 25 3d a7 4d 61 63 24 | 2c 22 3a 22 29 0d 0a 00 |P%=.Mac$|,":")...|
|000016f0| 0e e7 20 50 25 20 3e 20 | 30 20 8c 0d 0a 0a 21 20 |.. P% > |0 ....! |
|00001700| 20 20 50 6f 72 74 24 20 | 3d 20 22 20 22 20 2b 20 | Port$ |= " " + |
|00001710| c1 4d 61 63 24 2c 20 50 | 25 2b 31 29 0d 0a 14 1a |.Mac$, P|%+1)....|
|00001720| 20 20 20 4d 61 63 24 20 | 3d 20 c0 4d 61 63 24 2c | Mac$ |= .Mac$,|
|00001730| 20 50 25 2d 31 29 0d 0a | 1e 05 cc 0d 0a 28 11 20 | P%-1)..|.....(. |
|00001740| 20 20 50 6f 72 74 24 20 | 3d 20 22 22 0d 0a 32 05 | Port$ |= ""..2.|
|00001750| cd 0d 0a 3c 1a 4d 61 63 | 24 20 3d 20 a4 75 6e 65 |...<.Mac|$ = .une|
|00001760| 73 63 61 70 65 28 4d 61 | 63 24 29 0d 0a 46 1c 55 |scape(Ma|c$)..F.U|
|00001770| 73 65 72 24 20 3d 20 a4 | 75 6e 65 73 63 61 70 65 |ser$ = .|unescape|
|00001780| 28 55 73 65 72 24 29 0d | 0a 50 1c 50 61 73 73 24 |(User$).|.P.Pass$|
|00001790| 20 3d 20 a4 75 6e 65 73 | 63 61 70 65 28 50 61 73 | = .unes|cape(Pas|
|000017a0| 73 24 29 0d 0a 5a 1c 50 | 6f 72 74 24 20 3d 20 a4 |s$)..Z.P|ort$ = .|
|000017b0| 75 6e 65 73 63 61 70 65 | 28 50 6f 72 74 24 29 0d |unescape|(Port$).|
|000017c0| 0a 64 05 e1 0d 0a 6e 04 | 0d 0a 78 12 dd a4 75 6e |.d....n.|..x...un|
|000017d0| 65 73 63 61 70 65 28 52 | 24 29 0d 0a 82 10 ea 20 |escape(R|$)..... |
|000017e0| 50 25 2c 20 4c 24 2c 20 | 54 24 0d 0a 8c 0b 4c 24 |P%, L$, |T$....L$|
|000017f0| 20 3d 20 22 22 0d 0a 96 | 05 f5 0d 0a a0 14 20 20 | = ""...|...... |
|00001800| 50 25 20 3d 20 a7 52 24 | 2c 20 22 25 22 29 0d 0a |P% = .R$|, "%")..|
|00001810| aa 10 20 20 e7 20 50 25 | 20 3e 20 30 20 8c 0d 0a |.. . P%| > 0 ...|
|00001820| b4 1a 20 20 20 20 54 24 | 20 3d 20 c1 52 24 2c 20 |.. T$| = .R$, |
|00001830| 50 25 2b 31 2c 20 32 29 | 0d 0a be 27 20 20 20 20 |P%+1, 2)|...' |
|00001840| 4c 24 20 2b 3d 20 c0 52 | 24 2c 20 50 25 2d 31 29 |L$ += .R|$, P%-1)|
|00001850| 20 2b 20 bd 28 a0 28 22 | 26 22 2b 54 24 29 29 0d | + .(.("|&"+T$)).|
|00001860| 0a c8 17 20 20 20 20 52 | 24 20 3d 20 c1 52 24 2c |... R|$ = .R$,|
|00001870| 20 50 25 2b 33 29 0d 0a | d2 07 20 20 cd 0d 0a dc | P%+3)..|.. ....|
|00001880| 0c fd 20 50 25 20 3d 20 | 30 0d 0a e6 0d 3d 20 4c |.. P% = |0....= L|
|00001890| 24 20 2b 20 52 24 0d ff | |$ + R$..| |
+--------+-------------------------+-------------------------+--------+--------+